{$CLEO .s}
{$INCLUDE_ONCE ../cleo_tester.inc}

script_name '2000'
test("2000 (get_cleo_arg_count)", tests)
terminate_this_custom_script


:return_arg_count
    0@ = get_cleo_arg_count
cleo_return 1 0@


function tests
    it("should return cleo call arguments count", test1)
    return
    
    function test1
        cleo_call @return_arg_count {numParams} 0 {params} {result} 0@
        assert_eq(0@, 0)
        
        cleo_call @return_arg_count {numParams} 1 {params} 123 {result} 0@
        assert_eq(0@, 1)
        
        cleo_call @return_arg_count {numParams} 2 {params} 123 0@ {result} 0@
        assert_eq(0@, 2)
        
        cleo_call @return_arg_count {numParams} 3 {params} 123 0@ "some_text" {result} 0@
        assert_eq(0@, 3)
        
        cleo_call @return_arg_count {numParams} 25 {params} 123 0@ "some_text" 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 {result} 0@
        assert_eq(0@, 25)
    end
end
